MacWorld 1999 April/Macworld (1999-04).dmg/Serious Software/GrooveMaker demo/GrooveMaker Demo/Media/MenuSong.dxr/00032.ls

Text File | 1998-07-27 | 655 b | 36 lines

on mouseEnter
  if the visible of window "Help" then
    tell window "help"
      go("pref")
    end tell
  end if
end

on mouseLeave
  if the visible of window "Help" then
    tell window "help"
      go("start")
    end tell
  end if
end

on mouseDown
  if not (the visible of window "Help") then
    repeat while the mouseDown
      set the memberNum of sprite 9 to the number of member "Hpref"
      updateStage()
    end repeat
  end if
end

on mouseUp
  global gReturn
  if not (the visible of window "Help") then
    cursor(4)
    set gReturn to "start menuSong"
    sound stop 1
    go("start", the moviePath & "pref")
    cursor(-1)
  end if
end